#include "EventLoop.h"
#include "Channel.h"
#include "Connection.h"
#include "Log.h"

#include <unistd.h>
#include <sys/syscall.h>
#include <sys/eventfd.h>
#include <sys/timerfd.h>
#include <cstring>



int createtimerfd(int sec=30)
{
    int tfd=timerfd_create(CLOCK_MONOTONIC,TFD_CLOEXEC|TFD_NONBLOCK);   // 创建timerfd。
    struct itimerspec timeout;                                // 定时时间的数据结构。
    memset(&timeout,0,sizeof(struct itimerspec));
    timeout.it_value.tv_sec = sec;                             // 定时时间，固定为5，方便测试。
    timeout.it_value.tv_nsec = 0;
    timerfd_settime(tfd,0,&timeout,0);
    return tfd;
}

EventLoop::EventLoop(bool is_mainloop,int timetvl,int timeout_threshold)
    :m_ep(new Epoll),m_is_mainloop(is_mainloop),m_timetvl(timetvl),m_timeout_threshold(timeout_threshold),
    m_wakeup_fd(eventfd(0,EFD_NONBLOCK)),m_wakechannel(new Channel(this,m_wakeup_fd)),
    m_timerfd(createtimerfd(m_timetvl)),m_timerchannel(new Channel(this,m_timerfd)),
    m_stop(false)
{
    m_wakechannel->set_read_callback(std::bind(&EventLoop::handle_wakeup,this));
    m_wakechannel->enable_reading();

    m_timerchannel->set_read_callback(std::bind(&EventLoop::handle_timer,this));
    m_timerchannel->enable_reading();
}

EventLoop::~EventLoop()
{
}

void EventLoop::run()
{
    //LOG(INFO)<<"event loop.";
    m_thread_id=syscall(SYS_gettid);
    
    while (!m_stop)
    {   
        std::vector<Channel *> channels = m_ep->loop(10*1000);
        
        if(channels.size()==0)
        {
            m_epoll_timeout_callback(this);
        }
        else
        {
            for (auto &ch : channels)
            {
                ch->handle_event();
            }
        }
    }
}

void EventLoop::update_channel(Channel *channel)
{
    m_ep->update_channel(channel);
}

void EventLoop::remove_channel(Channel *channel)
{
    m_ep->remove_channel(channel);
}

void EventLoop::set_epoll_timeout_callback(std::function<void(EventLoop*)> fn)
{
    m_epoll_timeout_callback=fn;
}

bool EventLoop::is_in_loop_thread()
{
    return m_thread_id == syscall(SYS_gettid);
}

void EventLoop::queue_in_loop(std::function<void()> fn)
{
    {
        std::lock_guard<std::mutex> lock(m_mutex);
        m_taskqueue.push(fn);
    }
    wakeup();
}

void EventLoop::wakeup()
{
    uint64_t val=1;
    write(m_wakeup_fd,&val,sizeof(val));
}

void EventLoop::handle_wakeup()
{
    //LOG(INFO)<<"handlewakeup()";
    uint64_t val;
    read(m_wakeup_fd,&val,sizeof(val));

    std::function<void()> fn;
    
    std::lock_guard<std::mutex> lock(m_mutex);

    while(m_taskqueue.size()>0)
    {
        fn=std::move(m_taskqueue.front());
        m_taskqueue.pop();
        fn();
    }
}

// 闹钟响时执行的函数。
void EventLoop::handle_timer()                                                 
{
    // 重新计时。
    struct itimerspec timeout;                                // 定时时间的数据结构。
    memset(&timeout,0,sizeof(struct itimerspec));
    timeout.it_value.tv_sec = m_timetvl;                             // 定时时间，固定为5，方便测试。
    timeout.it_value.tv_nsec = 0;
    timerfd_settime(m_timerfd,0,&timeout,0);

    if (m_is_mainloop)
    {
        //LOG(INFO)<<"主事件循环的闹钟时间到了。";

    }
    else
    {
        //LOG(INFO)<<"从事件循环的闹钟时间到了。";
        time_t now=time(0);
        //todo 修改的bug
        for(auto it=m_conns.begin();it!=m_conns.end();)
        {
            if(it->second->is_timeout(now,m_timeout_threshold))
            {
                //todo auto遍历容器，能中途删除元素吗？
                //不能
                {
                    std::lock_guard<std::mutex> gd(m_mmutex);
                    it = m_conns.erase(it);
                }
                
                m_timer_callback(it->first);
            }
            else
            {
                it++;
            }
        }
    }
}

void EventLoop::add_connection(ConnectionPtr conn)
{
    {
        std::lock_guard<std::mutex> gd(m_mmutex);
        m_conns[conn->fd()]= conn;
    }
}

void EventLoop::set_timer_callback(std::function<void(int)> fn)
{
    m_timer_callback=fn;
}

void EventLoop::stop()
{
    m_stop = true;
    wakeup();
} 